home *** CD-ROM | disk | FTP | other *** search
- if(re eq "1")
- {
- if(stop eq "0")
- {
- if(pmovenew eq "up")
- {
- if(pmovenew eq "up" and up eq "1")
- {
- setProperty("/dot", _Y, doty - "10");
- setProperty("/dot", _rotation, "270");
- re = "0";
- pmovelast = "up";
- }
- else if(pmovelast eq "down" and down eq "1")
- {
- setProperty("/dot", _Y, doty + "10");
- re = "0";
- }
- else if(pmovelast eq "left" and left eq "1")
- {
- setProperty("/dot", _X, dotx - "10");
- re = "0";
- }
- else if(pmovelast eq "right" and right eq "1")
- {
- setProperty("/dot", _X, dotx + "10");
- re = "0";
- }
- }
- else if(pmovenew eq "down")
- {
- if(pmovenew eq "down" and down eq "1")
- {
- setProperty("/dot", _Y, doty + "10");
- setProperty("/dot", _rotation, "90");
- re = "0";
- pmovelast = "down";
- }
- else if(pmovelast eq "up" and up eq "1")
- {
- setProperty("/dot", _Y, doty - "10");
- re = "0";
- }
- else if(pmovelast eq "left" and left eq "1")
- {
- setProperty("/dot", _X, dotx - "10");
- re = "0";
- }
- else if(pmovelast eq "right" and right eq "1")
- {
- setProperty("/dot", _X, dotx + "10");
- re = "0";
- }
- }
- else if(pmovenew eq "left")
- {
- if(pmovenew eq "left" and left eq "1")
- {
- setProperty("/dot", _X, dotx - "10");
- setProperty("/dot", _rotation, "180");
- re = "0";
- pmovelast = "left";
- }
- else if(pmovelast eq "up" and up eq "1")
- {
- setProperty("/dot", _Y, doty - "10");
- re = "0";
- }
- else if(pmovelast eq "down" and down eq "1")
- {
- setProperty("/dot", _Y, doty + "10");
- re = "0";
- }
- else if(pmovelast eq "right" and right eq "1")
- {
- setProperty("/dot", _X, dotx + "10");
- re = "0";
- }
- }
- else if(pmovenew eq "right")
- {
- if(pmovenew eq "right" and right eq "1")
- {
- setProperty("/dot", _X, dotx + "10");
- setProperty("/dot", _rotation, "0");
- re = "0";
- pmovelast = "right";
- }
- else if(pmovelast eq "up" and up eq "1")
- {
- setProperty("/dot", _Y, doty - "10");
- re = "0";
- }
- else if(pmovelast eq "down" and down eq "1")
- {
- setProperty("/dot", _Y, doty + "10");
- re = "0";
- }
- else if(pmovelast eq "left" and left eq "1")
- {
- setProperty("/dot", _X, dotx - "10");
- re = "0";
- }
- }
- }
- }
-